function r = repmat(m,nr,nc)

  n = size(m);
  r.v = repmat(m.v,nr,nc);
  r.d = repmat(m.d,[1 nr nc]);

  r = class(r,'der1');
